#include "Rodeur.h"

using namespace std;
using namespace boost::assign;

const unsigned int Rodeur::nbr_comp = 16;

const unsigned int Rodeur::nbr_restric = 7;

const vector<ListComp> Rodeur::Comp = list_of
  (ListComp("Combat ambidextre"               ,  5))
  (ListComp("Déplacement silencieux"          ,  5, Pourcentage))
  (ListComp("Détecter les bruits"             , 10))
  (ListComp("Empathie animale"                , 10))
  (ListComp("Ennemi juré"                     , 10))
  (ListComp("Grimper"                         , 10, Pourcentage))
  (ListComp("Langage des animaux"             ,  5))
  (ListComp("Neutralisation"                  , 10))
  (ListComp("Passage sans trace"              , 10))
  (ListComp("Pistage"                         ,  5))
  (ListComp("Se cacher dans l'ombre"          ,  5, Pourcentage))
  (ListComp("Sorts cléricaux"                 , 10))
  (ListComp("Spécialisation"                  , 10))
  (ListComp("Suivants"                        , 10))
  (ListComp("Talent pour les arcs"            ,  5))
  (ListComp("Trouver et désamorcer les pièges", 10));

const vector<ListComp> Rodeur::Restric = list_of
  (ListComp("Limitation d'armes"                          ,  5))
  (ListComp("Limitation à la maille"                      ,  5))
  (ListComp("Limitation au cuir clouté"                   , 10))
  (ListComp("Sans armure"                                 , 15))
  (ListComp("Lim : potions, huiles et parchemins"         ,  5))
  (ListComp("Lim : anneau, de bâton, bâtonnet et baguette",  5))
  (ListComp("Lim : armes et armures magiques"             ,  5));

const vector< Prerequis > Rodeur::Limites = list_of
  (Prerequis(0, 13))
  (Prerequis(1, 13))
  (Prerequis(2, 14))
  (Prerequis(4, 14));

const set< string > Rodeur::RacesAdmises = list_of
  ( "Humain" ) ( "Elfe" ) ( "Demi-Elfe" );

/** Constructeur usuel.
 * Permet la construction d'un paladin de A à Z, càd on détermine ici
 * les restrictions, puis les compétences.
 * @param xp le nombre de pts d'expérience du Rôdeur.
 * @param trait les traits du Rôdeur, le 7ème contient le score de
 * force exceptionnel, fixé à 0 si non applicable.
 * @param PP nombre de points de personnage (PP) à disposition pour la
 * céation du Rôdeur.
 * @param race nom de la race du personnage.
 */
Rodeur::Rodeur(unsigned int xp, const vector< unsigned int >& trait,
	       unsigned int& PP, const string& race)
  : Classe(xp, trait, Combattants, race)
{
  Type_classe = "Rôdeur";
  PP += 60;

  NombreTotalCompetences  = nbr_comp;
  NombreTotalRestrictions = nbr_restric;
  NombreTotalEnsembles    = 0;
  NombreMaxCompetences    = 0;
  ListesCompetences       = list_of< vector< ListComp > >( Comp );
  ListeRestrictions       = Restric;
  PrerequisClasse         = list_of< vector< Prerequis > >( Limites );
  RacesAdmisesClasse      = list_of< set< string > >( RacesAdmises );

  blank() << setfill('*') << setw(56) << '*' << endreq;
  blank() << "Création d'un rôdeur" << endl << endreq;

  construitClasse( PP );

//   unsigned int nbr(0);
 
//   for (unsigned int i(0); i<nbr_restric; i++)
//     {
//       if (Restric[i].Cout != 0)
// 	blank() << i+1 << ' ' << Restric[i].Comp << " ("
// 		<< Restric[i].Cout << " pp)" << endreq;
//       else
// 	blank() << i+1 << ' ' << Restric[i].Comp << " (cout variable)"
// 		<< endreq;	
//     }
//   blank() << nbr_restric+1 << " Aucune" << endreq;
//   blank() << "Choisir les restrictions" << endreq;
  
//   bool test(true), deja_pris, encore(false);
//   unsigned int save_PP(PP);

//   do
//     {
//       do
// 	{
// 	  nbr = demanderUnsignedBorne("Choisir les restrictions ", 1,
// 				      nbr_restric + 1);
// 	  if (nbr!=nbr_restric+1)
// 	    {
// 	      if (Restric[nbr-1].Cout == 0)
// 		{
// 		  deja_pris = safePushBack(&Comp_classe, 15+nbr);
// 		  if (deja_pris)
// 		    warning() << "Déjà sélectionné" << endreq;
// 		  else
// 		    {
// 		      Comp_classe.push_back(15+nbr);
// 		      unsigned int pps;
// 		      pps =  demanderUnsigned("Entrez les PP obtenus : ");
// 		      PP += pps;
// 		      blank() << "Restriction choisie : "
// 			      << Restric[nbr-1].Comp << endreq;
// 		    }
// 		}
// 	      else
// 		{
// 		  deja_pris = safePushBack(&Comp_classe, 15+nbr);
// 		  if (deja_pris)
// 		    warning() << "Déjà sélectionné" << endreq;
// 		  else
// 		    {
// 		      Comp_classe.push_back(15+nbr);
// 		      PP += Restric[nbr-1].Cout;
// 		      blank() << "Restriction choisie : "
// 			      << Restric[nbr-1].Comp << endreq;
// 		    }
// 		}
// 	    }
// 	  else
// 	    test = false;
// 	}
//       while(test);

//       afficheCompetences();
//       blank() << endl <<  "1 pour continuer, 2 pour recommencer" << endreq;
//       nbr = demanderUnsignedBorne("Choix ", 1, 2);
//       if (nbr == 2)
// 	{
// 	  PP = save_PP;
// 	  Comp_classe.clear();
// 	  test = true;
// 	  encore = true;
// 	  blank() << endreq;
// 	}
//       else
// 	encore = false;
//     }
//   while(encore);

//   test = true;

//   blank() << "Tu as " << PP << " pp à dépenser" << endreq;
//   save_PP = PP;

//   for (unsigned int i(0); i<nbr_comp; i++)
//     {
//       if (Comp[i].Cout != 0)
// 	blank() << i+1 << ' ' << Comp[i].Comp << " (" << Comp[i].Cout
// 		<< " pp)" << endreq;
//       else
// 	blank() << i+1 << ' ' << Comp[i].Comp << " (cout variable)"
// 		<< endreq;	
//     }
//   blank() << nbr_comp+1 << " Aucune" << endreq;
//   blank() << "Choisir les compétences de classe" << endreq;

//   do
//     {
//       do
// 	{
// 	  nbr = demanderUnsignedBorne("("+ecrireString(PP)+" restants) ", 1,
// 				      nbr_comp + 1);
// 	  if (nbr!=nbr_comp+1)
// 	    {
// 	      if (PP >= Comp[nbr-1].Cout)
// 		{
// 		  deja_pris = safePushBack(&Comp_classe, nbr - 1);
// 		  if (deja_pris)
// 		    warning() << "Déjà sélectionné" << endreq;
// 		  else
// 		    {
// 		      Comp_classe.push_back(nbr-1);
// 		      PP -= Comp[nbr-1].Cout;
// 		      blank() << "Compétence choisie : " << Comp[nbr-1].Comp
// 			      << endreq;
// 		    }
// 		}
// 	      else
// 		blank() << "Pas assez de pp" << endreq;
// 	    }
// 	  else
// 	    test = false;
// 	}
//       while(test);

//       afficheCompetences();
//       blank() << endl <<  "1 pour continuer, 2 pour recommencer" << endreq;
//       nbr = demanderUnsignedBorne("Choix ", 1, 2);
//       if (nbr == 2)
// 	{
// 	  PP = save_PP;
// 	  while(Comp_classe.back() < nbr_comp)
// 	    Comp_classe.pop_back();
// 	  test = true;
// 	  encore = true;
// 	  blank() << endreq;
// 	}
//       else
// 	encore = false;
//     }
//   while(encore);

  blank() << endl << setfill('*') << setw(56) << '*' << endreq;
  calculNiveau();
  calculNivMag();
}

/** Constructeur simplifié.
 * Permet de construire un Rôdeur lors de la lecture d'un ficier xml.
 * @param xp le nombre de pts d'expérience du Rôdeur.
 * @param trait les traits du Rôdeur, le 7ème contient le score de
 * force exceptionnel, fixé à 0 si non applicable.
 * @param race nom de la race du personnage.
 */
Rodeur::Rodeur(unsigned int xp, const vector< unsigned int >& trait,
	       const string& race)
  : Classe(xp, trait, Combattants, race)
{
  Type_classe = "Rôdeur";

  NombreTotalCompetences  = nbr_comp;
  NombreTotalRestrictions = nbr_restric;
  NombreTotalEnsembles    = 0;
  NombreMaxCompetences    = 0;
  ListesCompetences       = list_of< vector< ListComp > >( Comp );
  ListeRestrictions       = Restric;
  PrerequisClasse         = list_of< vector< Prerequis > >( Limites );
  RacesAdmisesClasse      = list_of< set< string > >( RacesAdmises );

  calculNiveau();
  calculNivMag();
}

/** Constructeur pour le mode graphique.
 * Permet de construire une instance de Mage avec le contenu
 * minimal, le nombre de points d'expériences et les capacités étant
 * déterminées après la déclaration.
 *
 * @param trait les traits du Mage, le 7ème contient le score de
 * force exceptionnel, fixé à 0 si non applicable.
 * @param UI contrôle, est présent pour des raisons historiques.
 * @param race nom de la race du personnage.
 */
Rodeur::Rodeur(const vector< unsigned int >& trait, const bool& UI,
	       const string& race)
  : Classe(0, trait, Combattants, race)
{
  if (!UI)
    {
      error() << "Création du personnage impossible" << endreq;
      exit(1);
    }

  Type_classe = "Rôdeur";

  NombreTotalCompetences  = nbr_comp;
  NombreTotalRestrictions = nbr_restric;
  NombreTotalEnsembles    = 0;
  NombreMaxCompetences    = 0;
  ListesCompetences       = list_of< vector< ListComp > >( Comp );
  ListeRestrictions       = Restric;
  PrerequisClasse         = list_of< vector< Prerequis > >( Limites );
  RacesAdmisesClasse      = list_of< set< string > >( RacesAdmises );

  calculNiveau();
  calculNivMag();
}

/**
 * Constructeur de "copie", destiné à être utilisé depuis MetaClasse.
 *
 * @param ptr pointeur sur un objet de type Classe (MetaClasse en
 * fait).
 */
Rodeur::Rodeur(Classe *ptr)
  : Classe( *ptr )
{
  Type_classe = "Rôdeur";

  NombreTotalCompetences  = nbr_comp;
  NombreTotalRestrictions = nbr_restric;
  NombreTotalEnsembles    = 0;
  NombreMaxCompetences    = 0;
  ListesCompetences       = list_of< vector< ListComp > >( Comp );
  ListeRestrictions       = Restric;
  PrerequisClasse         = list_of< vector< Prerequis > >( Limites );
  RacesAdmisesClasse      = list_of< set< string > >( RacesAdmises );

  calculNiveau();
  calculNivMag();
}

/** 
 * Destructeur, ne fait rien.
 */
Rodeur::~Rodeur()
{}

void Rodeur::calculNiveau()
{
  if (XP < 75000)
    {
      unsigned int i;
      for (i = 0; i < 5; i++)
	{
	  if (XP < (unsigned int) 2250 * puissance(2, i))
	    break;
	}
      Niveau = i + 1;
    }
  else if (XP < 150000)
    Niveau = 7;
  else if (XP < 300000)
    Niveau = 8;
  else
    Niveau = (XP - 300000) / 300000 + 9;
}

// void Rodeur::afficher_stats(ostream& os)
// {
//   os << "Rôdeur" << endreq;
//   os << "Niveau " << Niveau << ", niveau de magie " << Niveau_mag << endreq;
//   for (unsigned int i(0); i < 6; i++)
//     os << Caracteristiques[i] << ' ' <<Traits[i] << endreq;
//   for (unsigned int i(0); i < Comp_classe.size(); i++)
//     {
//       if(Comp_classe[i] >= nbr_comp)
// 	os << Restric[Comp_classe[i] - nbr_comp].Comp << endreq;
//       else
// 	os << Comp[Comp_classe[i]].Comp << endreq;
//     }
// }

// void Rodeur::appliquerModif(const string& type)
// {}

// void Rodeur::augmenterTalents(const unsigned int& bonus, const bool& lvl_up)
// {}

void Rodeur::getJS(unsigned int *tab) const
{
  *(tab + 0) = 14; // Paralysie, Poison ou Mort magique
  *(tab + 1) = 16; // Bâton, batonnet baguette
  *(tab + 2) = 15; // Pétrification ou Métamorphose
  *(tab + 3) = 17; // Souffles
  *(tab + 4) = 17; // Sorts
  
  unsigned int cat;
  if (Niveau <= 2)
    cat = 0;
  else  if (Niveau <= 4)
    cat = 1;
  else  if (Niveau <= 6)
    cat = 3;
  else  if (Niveau <= 8)
    cat = 4;
  else  if (Niveau <= 10)
    cat = 6;
  else  if (Niveau <= 12)
    cat = 7;
  else  if (Niveau <= 14)
    cat = 9;
  else  if (Niveau <= 16)
    cat = 10;
  else
    cat = 11;

  *(tab + 0) -= cat;
  *(tab + 1) -= cat;
  *(tab + 2) -= cat;
  *(tab + 3) -= cat;
  *(tab + 4) -= cat;

  if (cat == 3)
    *(tab + 3) = 13;
  else if (cat == 4)
    *(tab + 3) = 12;
  else if (cat == 4)
    *(tab + 3) = 9;
  else if (cat == 6)
    *(tab + 3) = 8;
  else if (cat == 7)
    *(tab + 3) = 5;
  else if (cat >= 10)
    *(tab + 3) = 4;
}

// string Rodeur::getCompetence(const unsigned int& i) const
// {
//   if (getComp(i) < nbr_comp)
//     return Comp[getComp(i)].Comp;
//   else
//     return Restric[getComp(i)-nbr_comp].Comp;
// }

unsigned int Rodeur::calculeTAc0() const
{
  return 21 - Niveau;
}

/**
 * Le Rôdeur aquiert des sorts de prêtre au niveau 9, s'il possède la
 * compétence.
 */
void Rodeur::calculNivMag()
{
  if (Niveau < 8)
    Niveau_mag = 0;
  else if (Niveau < 14)
    Niveau_mag = (Niveau - 7) / 2;
  else
    Niveau_mag = 3;
}

/**
 * Le Rôdeur peut prende la compétence "Sorts cléricaux", qui lui donne
 * accès dès le niveau 9 aux sphères Animale et Végétale.
 */
void Rodeur::ecrireSorts(const string& nom_fichier, const bool& ecrase) const
{
  bool a_des_sort(false);
  if ( find( Cl_sorts.begin(), Cl_sorts.end(), 9 ) != Cl_sorts.end() )
    a_des_sort = true;
  //   for (unsigned int i(0); i < getCombien(); i++)
  //     {
  //       if (getComp(i) == 9)
  // 	{
  // 	  a_des_sort = true;
  // 	  break;
  // 	}
  //     }
  ofstream sortie;
  if (ecrase)
    sortie.open(nom_fichier.c_str());
  else
    sortie.open(nom_fichier.c_str(), ios::app);
  if (a_des_sort)
    {
      for (unsigned int i(1); i <= Niveau_mag; i++)
	sortie << "\\input{Sorts_clerc/Animale_" + ecrireString(i) + ".inc.tex}" << endreq;
      for (unsigned int i(1); i <= Niveau_mag; i++)
	sortie << "\\input{Sorts_clerc/Végétale_" + ecrireString(i) + ".inc.tex}" << endreq;
    }
  else
    sortie << "% Rodeur sans sorts" << endreq;
  sortie.close();
}

void Rodeur::nbrSort(unsigned int sorts[], const unsigned int& taille) const
{
  Debug::empileNiveau( &fonction );
  func() << "Rodeur::nbrSort -> début" << endreq;

  unsigned int i, tmp[3];
  
  for (i = 0; i < taille; i++)
    tmp[i] = 0;
  
  switch( Niveau )
    {
    case 1:
    case 2:
    case 3:
    case 4:
    case 5:
    case 6:
    case 7:
      break;
    case 8:
      tmp[0] = 1;
      break;
    case 9:
      tmp[0] = 2;
      break;
    case 10:
      tmp[0] = 2;
      tmp[1] = 1;
      break;
    case 11:
      tmp[0] = 2;
      tmp[1] = 2;
      break;
    case 12:
      tmp[0] = 2;
      tmp[1] = 2;
      tmp[2] = 1;
      break;
    case 13:
      tmp[0] = 3;
      tmp[1] = 2;
      tmp[2] = 1;
      break;
    case 14:
      tmp[0] = 3;
      tmp[1] = 2;
      tmp[2] = 2;
      break;
    case 15:
      tmp[0] = 3;
      tmp[1] = 3;
      tmp[2] = 2;
      break;
    default:
      tmp[0] = 3;
      tmp[1] = 3;
      tmp[2] = 3;
    }

  for (i = 0; i < Niveau_mag; i++)
    sorts[i] = tmp[i];
  
  func() << "Rodeur::nbrSort -> fin" << endreq;
  Debug::depileNiveau();
}

/**
 * Permet de gérer les compétences martiales, càd lesquelles sont accessibles
 * à quel coût.
 *
 * Pour un Rôdeur, comme pour tous les combattants, le coût est de 3 pour
 * n'importe quelle arme. De plus, il peut acquérir un groupe restreint pour
 * 4 pp et un groupe large pour 5 pp.
 */
void Rodeur::getPrixAcces(map<string, unsigned int>*& Map) const
{
  Debug::empileNiveau( &fonction );
  //DebugLevelType etat_precedent(dout.getLevel());
  //dout.setLevel(fonction);
  func() << "Rodeur::getPrixAcces -> début" << endreq;

  map<string, unsigned int>::const_iterator mapIt, mapBegin(Map -> begin()),
    mapEnd(Map -> end());

  for (mapIt = mapBegin; mapIt != mapEnd; mapIt++)
    {
      lfunc() << mapIt -> first << endreq;
    }
  Map -> operator[]("Rôdeur") = 2;
  
  func() << "Rodeur::PrixAcces -> fin" << endreq;
  Debug::depileNiveau();//dout.setLevel(etat_precedent);
}

string Rodeur::getScoreAdditionnel(const unsigned int& i) const
{
  Debug::empileNiveau( &fonction );
  func() << "Rodeur::getScoreAdditionnel -> début" << endreq;

  string renvoi( "" );
  unsigned int resultat( 0 );

  if ( Comp[ i ].Comp == "Déplacement silencieux" ||
       Comp[ i ] .Comp == "Trouver et désamorcer les pièges" )
    {
      switch( Niveau )
	{
	case 1:
	  resultat = 10;
	  break;
	case 2:
	  resultat = 15;
	  break;
	case 3:
	  resultat = 20;
	  break;
	case 4:
	  resultat = 25;
	  break;
	case 5:
	  resultat = 31;
	  break;
	case 6:
	  resultat = 37;
	  break;
	case 7:
	  resultat = 43;
	  break;
	case 8:
	  resultat = 49;
	  break;
	case 9:
	  resultat = 56;
	  break;
	case 10:
	  resultat = 63;
	  break;
	case 11:
	  resultat = 70;
	  break;
	case 12:
	  resultat = 77;
	  break;
	case 13:
	  resultat = 85;
	  break;
	case 14:
	  resultat = 93;
	  break;
	default:
	  resultat = 99;
	}
    }
  else if (  Comp[ i ].Comp == "Détecter les bruits" ||
	     Comp[ i ].Comp == "Grimper" ||
	     Comp[ i ].Comp == "Se cacher dans l'ombre" )
    {
      switch( Niveau )
	{
	case 1:
	  resultat = 15;
	  break;
	case 2:
	  resultat = 21;
	  break;
	case 3:
	  resultat = 27;
	  break;
	case 4:
	  resultat = 33;
	  break;
	case 5:
	  resultat = 40;
	  break;
	case 6:
	  resultat = 47;
	  break;
	case 7:
	  resultat = 55;
	  break;
	case 8:
	  resultat = 62;
	  break;
	case 9:
	  resultat = 70;
	  break;
	case 10:
	  resultat = 78;
	  break;
	case 11:
	  resultat = 86;
	  break;
	case 12:
	  resultat = 94;
	  break;
	default:
	  resultat = 99;
	}
      if ( Comp[ i ].Comp ==  "Détecter les bruits" )
	{
	  resultat += getTrait( 4 );
	  if ( resultat > 99 )
	    resultat = 99;
	}
      if ( Comp[ i ].Comp ==  "Grimper" )
	{
	  resultat += getTrait( 1 );
	  if ( resultat > 99 )
	    resultat = 99;
	}
    }
  else if (  Comp[ i ].Comp == "Neutralisation" )
    {
      switch( Niveau )
	{
	case 1:
	case 2:
	case 3:
	case 4:
	  renvoi = "dégâts x2";
	  break;
	case 5:
	case 6:
	case 7:
	case 8:
	  renvoi = "dégâts x3";
	  break;
	case 9:
	case 10:
	case 11:
	case 12:
	  renvoi = "dégâts x4";
	  break;
	default:
	  renvoi = "dégâts x5";
	}
    }
	    
  if ( renvoi == "" )
    renvoi = ecrireString( resultat );
	    
	    
  func() << "Rodeur::getScoreAdditionnel -> fin" << endreq;
  Debug::depileNiveau();

  return renvoi;
}
